0 REM SAVE"@:-  2 PLANETEN  -",12
1 LW=PEEK(186)
2 IFZ=0THENZ=1:GOTO6
3 IFZ=1THENZ=2:GOSUB10:SYS49154
4 IFZ=2THENZ=3:GOTO8
5 IFZ=3THENZ=4:GOTO9
6 FORA=49154TO49317:READI:POKEA,I:NEXT
7 LOAD"- 01*",LW,1:END
8 LOAD"- 02*",LW,1:END
9 SYS49152:GOTO 40
10 C$="[215]ELLE: [197]RDBALL":GOSUB1000
11 C$="AUF DER":GOSUB1000
12 C$="[215][201][204][204][207][215] 2003":GOSUB1000
13 C$="(28. - 30. [206]OVEMBER)":GOSUB1000
14 C$="SENDET":GOSUB1000
15 C$="[218][215][197][201] [208][204][193][206][197][212][197][206]":GOSUB1000
17 C$="[201][206][212][197][210][206][197][212][218]: WWW.WELLE-E.DE":GOSUB1000
30 PRINT"[144][147]";:POKES,21:POKEV,151
31 PRINT"[154]":RETURN
40 GOTO 40
1000 M=((40-LEN(C$))/2):F=53281:D=53280:V=56576:S=53272:R=648:W=53266
1001 B$="[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][129]  [150]  [158]     [158]  [150]  [129]  [144] ":POKEF,0:POKED,0:PRINT"[144][147]"
1002 A$="  [159]  [153]  [158]         [158]  [153]  [159]   [157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][144] "
1003 POKER,160:PRINT"[147][144]"SPC(M)C$:POKES,134:POKER,4:POKEV,149
1004 PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]";
1005 FORT=1TO60:PRINTA$;:FORZA=0TO10:NEXT:NEXT:PRINT:RETURN
1300 :
1301 DATA173,17,208,41,239,141,17,208,162,127,160,64,32,156,192,162
1302 DATA4,160,0,32,161,192,162,131,160,39,32,114,192,162,131,160
1303 DATA40,32,156,192,162,216,160,0,32,161,192,162,135,160,15,32
1304 DATA114,192,173,16,135,141,33,208,173,17,208,9,34,141,17,208
1305 DATA173,22,208,41,223,9,16,141,22,208,173,24,208,9,8,141
1306 DATA24,208,162,96,160,0,32,156,192,162,32,160,0,32,161,192
1307 DATA162,127,160,63,32,114,192,173,17,208,9,16,141,17,208,96
1308 DATA142,1,192,140,0,192,160,0,177,251,145,253,165,252,205,1
1309 DATA192,208,8,165,251,205,0,192,208,1,96,230,251,208,2,230
1310 DATA252,230,253,208,227,230,254,76,122,192,134,252,132,251,96,134
1311 DATA254,132,253,96